home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 19 / CU Amiga Magazine's Super CD-ROM 19 (1998)(EMAP Images)(GB)[!][issue 1998-02].iso / CUCD / Programming / LEDA / source / src / basic / _basic.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-11-16  |  3.6 KB  |  210 lines
  1. /*******************************************************************************
  2. +
  3. +  LEDA  3.1c
  4. +
  5. +
  6. +  _basic.c
  7. +
  8. +
  9. +  Copyright (c) 1994  by  Max-Planck-Institut fuer Informatik
  10. +  Im Stadtwald, 6600 Saarbruecken, FRG     
  11. +  All rights reserved.
  12. + 
  13. *******************************************************************************/
  14.  
  15.  
  16. #include <LEDA/basic.h>
  17.  
  18. #include <time.h>
  19. #include <string.h>
  20. #include <sys/types.h>
  21.  
  22. #if defined(__MSDOS__)
  23. #include <dos.h>
  24. #else
  25. #include <unistd.h>
  26. #include <sys/times.h>
  27. #include <sys/param.h>
  28. #endif
  29.  
  30.  
  31. int LEDA::loop_dummy = 0;
  32.  
  33.  
  34. LEDA::LEDA()
  35. { init_list = getenv("LEDA_INIT");
  36.   init_random();
  37.  }
  38.  
  39.  
  40. LEDA::~LEDA() 
  41. { 
  42.   if (init_list && strcmp(init_list,"statistics")==0)
  43.   { if (version_string) printf("\n%s\n",version_string);
  44.     printf("\n");
  45.     print_statistics(); 
  46.    }
  47.  } 
  48.  
  49.  
  50. LEDA L_E_D_A;
  51.  
  52.  
  53.  
  54. //------------------------------------------------------------------------------
  55. // Error Handling
  56. //------------------------------------------------------------------------------
  57.  
  58.  
  59. PEH p_error_handler = default_error_handler;
  60.  
  61. void default_error_handler(int i, const char* s)
  62. { if (i==0) 
  63.    cout << "(warning) " << s << "\n";
  64.   else 
  65.    { cout << "ERROR "<< s << "\n";
  66.      cout.flush();
  67.      abort();
  68.     }
  69. }
  70.  
  71. PEH set_error_handler(PEH handler)
  72. { PEH old = error_handler;
  73.   p_error_handler = handler;
  74.   return old;
  75. }
  76.  
  77. //------------------------------------------------------------------------------
  78. // useful functions
  79. //------------------------------------------------------------------------------
  80.  
  81. LEDA_SIG_PF catch_interrupts(LEDA_SIG_PF handler) 
  82. { error_handler(0,"catch_interrupts not implemented.");
  83.   return handler; 
  84.  }
  85.  
  86.  
  87.  
  88. void init_random(int seed)
  89. { time_t l = seed;
  90.   if (l==0) time(&l);
  91.   srandom(int(l));
  92.  }
  93.  
  94.  
  95. #if defined(__MSDOS__) 
  96.  
  97. #if defined(__GNUG__)
  98. static long clock()
  99. { union REGS regs;
  100.   regs.h.ah=0x00;
  101.   int86(0x1A,®s,®s);
  102.   return (regs.x.cx << 16) + regs.x.dx;
  103. }
  104. #define CLK_TCK  18.2
  105. #endif
  106.  
  107. float used_time() { return  float(clock())/CLK_TCK; }
  108.  
  109. #else
  110.  
  111. /* For AMIGA */
  112. #define HZ 50
  113. float used_time()
  114. { tms x;
  115.   times(&x);
  116.   return  float(x.tms_utime)/HZ;
  117. }
  118.  
  119. #endif
  120.  
  121.  
  122. float used_time(float& T)
  123. { float t = T;
  124.   T =  used_time();
  125.   return  T-t;
  126. }
  127.  
  128.  
  129. void print_time(string s)
  130. { cout << s;
  131.   cout << string("  time= %.2f sec",used_time());
  132.   newline;
  133. }
  134.  
  135.  
  136. void wait(unsigned int sec) { sleep(sec); }
  137.   
  138.  
  139. //------------------------------------------------------------------------------
  140. // Input/Ouput
  141. //------------------------------------------------------------------------------
  142.  
  143.  
  144. int Yes(string s)
  145. { char answer = read_char(s);
  146.   return ((answer == 'y') || (answer == 'Y'));
  147. }
  148.  
  149. int read_int(string s)
  150. { int answer;
  151.   char c;
  152.  
  153.   for(;;)
  154.   { cout << s;
  155.     cin >> answer;
  156.     if (!cin) 
  157.       { cin.clear();
  158.         cin.get(c);
  159.         cout << string("read_int: illegal input \"%c\"\n",c);
  160.         if (c != '\n') skip_line(cin);
  161.        }
  162.     else  
  163.        break;
  164.    }
  165.  
  166.   skip_line(cin);
  167.  
  168.   return answer;
  169. }
  170.  
  171. char read_char(string s)
  172. { char c;
  173.   cout << s;
  174.   cin.get(c);
  175.   if (c != '\n') skip_line(cin);
  176.   return c;
  177. }
  178.  
  179. double read_real(string s)
  180. { double answer;
  181.   cout << s;
  182.   cin >> answer;
  183.   skip_line(cin);
  184.   return answer;
  185. }
  186.  
  187. string read_line(istream& in)
  188. { string result;
  189.   result.read_line(in); 
  190.   return result;
  191.  }
  192.  
  193. string read_string(string s)
  194. { cout << s << flush;
  195.   return read_line(cin); 
  196.  }
  197.  
  198. void skip_line(istream& s)
  199. { char c;
  200.   while(s.get(c) &&  c != '\n');
  201.  }
  202.  
  203.  
  204. int     Yes()              { return Yes(""); }
  205. int     read_int()         { return read_int(""); }
  206. char    read_char()        { return read_char(""); }
  207. double  read_real()        { return read_real(""); }
  208. string  read_string()      { return read_string(""); } 
  209.  
  210.